home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2004 E…tra 100 Bedste Programmer / K-CD_2004_Ekstra_100_Gratis_Programmer.iso / Windows / X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinXP AutoPlay 2.xpl < prev    next >
Encoding:
XSetup plugin  |  2003-08-01  |  1.6 KB  |  44 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="System\AutoPlay\Troubleshooting"
  5. "NAME"="Shell HW Detection Service"
  6. "VERSION"="1.02"
  7. "LANGUAGE"="VBScript"
  8. "OSVERSION"="0000011"
  9. "TEXT 1"="Enable Shell HW Detection Service"
  10. "DESCRIPTION 1"="Normally, you can configure the "AutoPlay" feature of Windows by selecting the CD-ROM or DVD Drive in question, right-click on it, selecting "Properties" and check the tab "AutoPlay"."
  11. "DESCRIPTION 2"="However, this tab will disappear when the system service "Shell Hardware Detection" isn't running. Some "system optimizers" disable this service because it's usually not needed and thus the "AutoPlay" tab inside the properties is gone."
  12. "DESCRIPTION 3"="By enabling it here again and restarting the computer, you can bring up this tab again. If you later decide you don't need it anymore, simply disable it here again."
  13. "DESCRIPTION 4"="IMPORTANT: This service might also provide other services, not just the "AutoPlay" tab."
  14. "AUTHOR"="Xteq Systems"
  15. "CONTACTURL"="http://www.xteq.com"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 2"="Thanks to Matthias Mei▀er [digi_c@web.de] for the idea!"
  18.  
  19.  
  20.  
  21. sP1="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\ShellHWDetection\Start"
  22.  
  23. Sub Plugin_Initialize 
  24.  i=RegReadValue(sP1)
  25.  if i=2 then SetUIElement 1,true
  26. End Sub
  27.  
  28.  
  29.  
  30. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  31.  b=GetUIElement(1)
  32.  if b=true then
  33.     Call RegWriteValue(sP1,2,2)
  34.  else
  35.     Call RegWriteValue(sP1,3,2)
  36.  end if
  37.  
  38.  Call Restart()
  39. End Sub
  40.  
  41.  
  42. Sub Plugin_Terminate 
  43. End Sub
  44.